home *** CD-ROM | disk | FTP | other *** search
/ PC Plus SuperCD (UK) 1997 May / PC Plus Super CD Issue 127 (May 1997).iso / delphi1 / lessons.exe / lesson4 / TODOLIST / CALEND1.DFM / CALEND1.txt
Encoding:
Text File  |  1996-01-11  |  1.9 KB  |  103 lines
  1. object CalForm: TCalForm
  2.   Left = 250
  3.   Top = 130
  4.   HorzScrollBar.Visible = False
  5.   BorderIcons = []
  6.   BorderStyle = bsDialog
  7.   Caption = 'Pick a Date...'
  8.   ClientHeight = 226
  9.   ClientWidth = 260
  10.   Font.Color = clWindowText
  11.   Font.Height = -13
  12.   Font.Name = 'System'
  13.   Font.Style = []
  14.   PixelsPerInch = 96
  15.   Position = poScreenCenter
  16.   OnClose = FormClose
  17.   OnCreate = FormCreate
  18.   TextHeight = 16
  19.   object Panel1: TPanel
  20.     Left = 0
  21.     Top = 0
  22.     Width = 257
  23.     Height = 225
  24.     TabOrder = 7
  25.     object DateLabel: TLabel
  26.       Left = 0
  27.       Top = 0
  28.       Width = 257
  29.       Height = 25
  30.       Alignment = taCenter
  31.       AutoSize = False
  32.     end
  33.   end
  34.   object Calendar1: TCalendar
  35.     Left = 0
  36.     Top = 48
  37.     Width = 257
  38.     Height = 129
  39.     StartOfWeek = 0
  40.     TabOrder = 0
  41.     OnChange = Calendar1Change
  42.   end
  43.   object LastMonthBtn: TButton
  44.     Left = 0
  45.     Top = 176
  46.     Width = 105
  47.     Height = 25
  48.     Caption = '<< Last Month'
  49.     TabOrder = 1
  50.     OnClick = LastMonthBtnClick
  51.   end
  52.   object NextMonthBtn: TButton
  53.     Left = 152
  54.     Top = 176
  55.     Width = 105
  56.     Height = 25
  57.     Caption = 'Next Month >>'
  58.     TabOrder = 2
  59.     OnClick = NextMonthBtnClick
  60.   end
  61.   object OKBtn: TButton
  62.     Left = 0
  63.     Top = 200
  64.     Width = 257
  65.     Height = 25
  66.     Caption = '&OK'
  67.     TabOrder = 3
  68.     OnClick = OKBtnClick
  69.   end
  70.   object LastYearBtn: TButton
  71.     Left = 0
  72.     Top = 24
  73.     Width = 129
  74.     Height = 25
  75.     Caption = '< Last Year'
  76.     TabOrder = 4
  77.     OnClick = LastYearBtnClick
  78.   end
  79.   object NextYearBtn: TButton
  80.     Left = 128
  81.     Top = 24
  82.     Width = 129
  83.     Height = 25
  84.     Caption = 'Next Year >'
  85.     TabOrder = 5
  86.     OnClick = NextYearBtnClick
  87.   end
  88.   object TodayBtn: TButton
  89.     Left = 104
  90.     Top = 176
  91.     Width = 49
  92.     Height = 25
  93.     Caption = 'Today'
  94.     Font.Color = clBlack
  95.     Font.Height = -13
  96.     Font.Name = 'System'
  97.     Font.Style = []
  98.     ParentFont = False
  99.     TabOrder = 6
  100.     OnClick = TodayBtnClick
  101.   end
  102. end
  103.